home *** CD-ROM | disk | FTP | other *** search
/ Aminet 40 / Aminet 40 (2000)(Schatztruhe)[!][Dec 2000].iso / Aminet / misc / emu / ATUtilities.lha / ATUtilities / hlp.c < prev    next >
C/C++ Source or Header  |  2000-09-26  |  711b  |  30 lines
  1. #include <exec/types.h>
  2.  
  3. struct GfxBase *GfxBase;
  4. struct IntuitionBase *IntuitionBase;
  5. struct ATUtilitiesBase *ATUtilitiesBase;
  6. struct DiskfontBase *DiskfontBase;
  7.  
  8. VOID main(argc,argv)
  9.  LONG   argc;
  10.  UBYTE *argv[];
  11. {
  12.  GfxBase=OpenLibrary("graphics.library",0L);
  13.  IntuitionBase=OpenLibrary("intuition.library",0L);
  14.  DiskfontBase=OpenLibrary("diskfont.library",0L);
  15.  ATUtilitiesBase=OpenLibrary("at-utilities.library",0L);
  16.  if((DiskfontBase!=NULL)&&(ATUtilitiesBase!=NULL))
  17.   {
  18.    if(argc==2)
  19.      Help(argv[1],0);
  20.    else if(argc==3)
  21.      Help(argv[1],atol(argv[2]));
  22.    else
  23.      Help("M:xy",0);
  24.   }
  25.  if(ATUtilitiesBase) CloseLibrary(ATUtilitiesBase);
  26.  if(DiskfontBase) CloseLibrary(DiskfontBase);
  27.  exit(0);
  28. }
  29.  
  30.